unit Initializator;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, Controller, MainFm,
  CargoDM, CfopDM, CondicaoPagamentoDM, ClienteDM, CaixaDM, CaixaEntSaiDM, ChequeDM, CfopMaisDM,
  CidadeDM, ConfiguracaoDM,ContaDM,CentroCustoDM,ContaMovimentacaoDM,
  DuplicataReceberDM, DuplicataPagDM, DuplicatasDM, DuplicataReceberFrDM,
  EntradaDM, EmpresaDM,
  FuncionarioDM, FornecedorDM, FormaPagamentoDM,
  GrupoDM, GarconDM, GerencialDM,
  MarcaDM, MesaDM,
  ProdutoDM, PessoaDM, PerfilDM, PerfilFunc2DM,
  RamoDM, SaidaDM,PlanoContaDM,
  VendaAbertaDM, VendaFrDM, UnidadeDM, UsuarioDM, TrocaSenhaDM,
  CidadeRecordFr, CidadeSearchFr, CargoRecordFr, CargoSearchFr,
  CfopRecordFr, CfopSearchFr,CentroCustoRecordFr,
  CondicaoPagamentoSearchFr, CondicaoPagTransRecordFr, ClienteSearchFr, ClienteRecordFr,
  CfopMaisUtilRecordFr, CfopMaisUtilSearchFr,
  CaixaFimRecordFr, CaixaEntSaiRecordFr, CaixaEntSaiSearchFr,
  CaixaSearchFr, CaixaVendasRecordFr, ContasPagarFr,ContasReceberFr,
  CaixaInicioRecordFr, ConfiguracaoRecordFr, ContaSearchFr, ContaRecordFr,ContaMovimentacaoSearchFr, ContaMovimentacaoRecordFr,
  DuplicataPagarSearchFr, DuplicataPagarRecordFr,
  DuplicataPagSearchFr, DuplicataRecSearchFr,
  PagDuplicataRecRecordFr, PagDuplicataPagRecordFr,
  EmpresaRecordFr, EmpresaSearchFr, EntradaTransRecordFr, EntradaSearchFr,
  FornecedorRecordFr, FornecedorSearchFr, FuncionarioSearchFr, FuncionarioRecordFr,
  GrupoRecordFr, GrupoSearchFr, GarconRecordFr, GerencialMainFr, LancamentosFr,
  MarcaRecordFr, MarcaSearchFr, MesaRecordFr,
  ProdutoSearchFr, ProdutoRecordFr, PessoaSearchFr, PessoaRecorFr,
  PerfilRecordFr, PerfilFunc2RecordFr, PlanoContaRecordFr, ReceitaDespesaAnualFr,
  RamoSearchFr, RamoRecordfr,  SaidaSearchFr,SaidaRecordFr, TransferenciaRecordFr,
  VendaSearchFr, VendaAbertaSearchFr, VendaAbertaTransRecordFr, VendaRecordFr,
  UnidadeRecordFr, UnidadeSearchFr, UsuarioRecordFr,
  UsuarioSearchFr
  , AdministrativoFr, CaixaVendasDM, ControleMesaFr, CaixaFr, EstoqueFr, VendasFr,
   EstoqueConsumoFr,EstoqueMininoFr,EstoqueProdutoFr,
  DuplicatasFr, TrocaSenhaRecordFr;

var
  TheControl: TController;
  //Principais
  AdministrativoFrame: TAdministrativoMainFrame;
  CaixaFrame: TCaixaMainFrame;
  ControleMesaFrame: TControleMesaMainFrame;
  EstoqueFrame: TEstoqueMainFrame;
  VendasFrame: TVendasMainFrame;
  DuplicatasFrame: TDuplicatasMainFrame;
  EstoqueProdutoFrame:TEstoqueProdutoFrame;
  EstoqueMininoFrame: TEstoqueMinimoFrame;
  EstoqueConsumoFrame: TEstoqueConsumoFrame;
  GerencialMainFrame: TGerencialMainFrame;

  CaixaInicioRecordFrame: TCaixaInicioRecordFrame;
  CaixaFimRecordFrame: TCaixaFimRecordFrame;
  CaixaSearchFrame: TCaixaSearchFrame;
  CaixaVendasRecordFrame: TCaixaVendasRecordFrame;
  CargoSearchFrame: TCargoSearchFrame;
  CargoRecordFrame: TCargoRecordFrame;
  CentroCustoRecordFrame: TCentroCustoRecordFrame;
  CfopSearchFrame: TCfopSearchFrame;
  CfopRecordFrame: TCfopRecordFrame;
  CfopMaisUtilRecordFrame: TCfopMaisUtilRecordFrame;
  CfopMaisUtilSearchFrame: TCfopMaisUtilSearchFrame;
  CidadeSearchFrame: TCidadeSearchFrame;
  CidadeRecordFrame: TCidadeRecordFrame;
  ClienteSearchFrame: TClienteSearchFrame;
  ClienteRecordFrame: TClienteRecordFrame;
  CondicaoPagamentoSearchFrame: TCondicaoPagamentoSearchFrame;
  CondicaoPagTransRecordFrame: TCondicaoPagTransRecordFrame;
  ContaMovimentacaoSearchFrame: TContaMovimentacaoSearchFrame;
  ContaMovimentacaoRecordFrame: TContaMovimentacaoRecordFrame;
  ConfiguracaoRecordFrame: TConfiguracaoRecordFrame;
  ContaSearchFrame: TContaSearchFrame;
  ContaRecordFrame: TContaRecordFrame;
  ContasReceberFrame: TContasReceberFrame;
  ContasPagarFrame: TContasPagarFrame;
  DuplicataRecSearchFrame: TDuplicataRecSearchFrame;
  DuplicataPagSearchFrame: TDuplicataPagSearchFrame;
  DuplicataPagarSearchFrame: TDuplicataPagarSearchFrame;
  DuplicataPagarRecordFrame: TDuplicataPagarRecordFrame;
  PagDuplicataPagRecordFrame: TPagDuplicataPagRecordFrame;
  PagDuplicataRecRecordFrame: TPagDuplicataRecRecordFrame;
  EmpresaSearchFrame: TEmpresaSearchFrame;
  EmpresaRecordFrame: TEmpresaRecordFrame;
  EntradaSearchFrame: TEntradaSearchFrame;
  EntradaTransRecordFrame: TEntradaTransRecordFrame;
  FornecedorSearchFrame: TFornecedorSearchFrame;
  FornecedorRecordFrame: TFornecedorRecordFrame;
  FuncionarioSearchFrame: TFuncionarioSearchFrame;
  FuncionarioRecordFrame: TFuncionarioRecordFrame;
  GrupoSearchFrame: TGrupoSearchFrame;
  GrupoRecordFrame: TGrupoRecordFrame;
  GarconRecordFrame: TGarconRecordFrame;
  LancamentosFrame: TLancamentosFrame;
  MarcaSearchFrame: TMarcaSearchFrame;
  MarcaRecordFrame: TMarcaRecordFrame;
  MesaRecordFrame: TMesaRecordFrame;
  PessoaSearchFrame: TPessoaSearchFrame;
  PessoaRecorFrame: TPessoaRecorFrame;
  PerfilRecordFrame: TPerfilRecordFrame;
  PerfilFunc2RecordFrame: TPerfilFunc2RecordFrame;
  ProdutoSearchFrame: TProdutoSearchFrame;
  ProdutoRecordFrame: TProdutoRecordFrame;
  PlanoContaRecordFrame: TPlanoContaRecordFrame;
  RamoSearchFrame: TRamoSearchFrame;
  RamoRecordFrame: TRamoRecordFrame;
  ReceitaDespesaAnualFrame: TReceitaDespesaFrame;
  SaidaSearchFrame: TSaidaSearchFrame;
  SaidaRecordFrame: TSaidaRecordFrame;
  TrocaSenhaRecordFrame: TTrocaSenhaRecordFrame;
  TransferenciaRecordFrame: TTransferenciaRecordFrame;
  UnidadeSearchFrame: TUnidadeSearchFrame;
  UnidadeRecordFrame: TUnidadeRecordFrame;
  UsuarioSearchFrame: TUsuarioSearchFrame;
  UsuarioRecordFrame: TUsuarioRecordFrame;
  VendaAbertaSearchFrame: TVendaAbertaSearchFrame;
  VendaAbertaTransRecordFrame: TVendaAbertaTransRecordFrame;
  VendaSearchFrame: TVendaSearchFrame;
  VendaRecordFrame: TVendaRecordFrame;

procedure InitializeFrames();

implementation

procedure InitializeFrames();
begin
  // Cria o controlador de frames
  TheControl := TController.Create(MainForm);

  //Principais
  // Administrativo
  AdministrativoFrame := TAdministrativoMainFrame.Create(nil);
  AdministrativoFrame.Caption := 'ADMINISTRATIVO';
  AdministrativoFrame.MainDataModule := EmpresaData;
  // CAIXA
  CaixaFrame := TCaixaMainFrame.Create(nil);
  CaixaFrame.Caption := 'CAIXA';
  CaixaFrame.MainDataModule := CaixaMovimentacaoData;
   // CONTROLE DE MESAS
  ControleMesaFrame := TControleMesaMainFrame.Create(nil);
  ControleMesaFrame.Caption := 'CONTROLE DE MESAS';
  ControleMesaFrame.MainDataModule := MesaData;
  // DUPLICATAS
  DuplicatasFrame := TDuplicatasMainFrame.Create(nil);
  DuplicatasFrame.Caption := 'DUPLICATAS A PAGAR';
  DuplicatasFrame.MainDataModule := DuplicataData;
   // ESTOQUE PRODUTOS
  EstoqueProdutoFrame := TEstoqueProdutoFrame.Create(nil);
  EstoqueProdutoFrame.Caption := 'ESTOQUE';
  EstoqueProdutoFrame.MainDataModule := ProdutoData;
   // ESTOQUE CONSUMIDO
  EstoqueConsumoFrame := TEstoqueConsumoFrame.Create(nil);
  EstoqueConsumoFrame.Caption := 'ESTOQUE CONSUMIDO';
  EstoqueConsumoFrame.MainDataModule := ProdutoData;
   // ESTOQUE MINIMO
  EstoqueMininoFrame := TEstoqueMinimoFrame.Create(nil);
  EstoqueMininoFrame.Caption := 'CONTROLE DE ESTOQUE MINIMO';
  EstoqueMininoFrame.MainDataModule := ProdutoData;
   // GERENCIAL
  GerencialMainFrame := TGerencialMainFrame.Create(nil);
  GerencialMainFrame.Caption := 'Gerencial';
//!  GerencialMainFrame.MainDataModule := ProdutoData;
  // VENDAS
  VendasFrame := TVendasMainFrame.Create(nil);
  VendasFrame.Caption := 'VENDAS';
  VendasFrame.MainDataModule := VendaFrData;

  // Cadastro de Inicialização do Caixa
  CaixaInicioRecordFrame := TCaixaInicioRecordFrame.Create(nil);
  CaixaInicioRecordFrame.Caption := 'Cadastro de Inicialização do Caixa';
  CaixaInicioRecordFrame.MainDataModule := CaixaMovimentacaoData;
  // Cadastro de Fechamento do Caixa
  CaixaFimRecordFrame := TCaixaFimRecordFrame.Create(nil);
  CaixaFimRecordFrame.Caption := 'Cadastro de Fechamento do Caixa';
  CaixaFimRecordFrame.MainDataModule := CaixaMovimentacaoData;
  // Busca Caixa
  CaixaSearchFrame := TCaixaSearchFrame.Create(nil);
  CaixaSearchFrame.Caption := 'Busca de Caixa ';
  CaixaSearchFrame.MainDataModule := CaixaMovimentacaoData;
  // Consulta de Caixa
  CaixaVendasRecordFrame := TCaixaVendasRecordFrame.Create(nil);
  CaixaVendasRecordFrame.Caption := 'Caixa';
  CaixaVendasRecordFrame.MainDataModule := CaixaMovimentacaoData;
  CaixaVendasRecordFrame.SearchFrame := CaixaSearchFrame;
  // Busca de cargo
  CargoSearchFrame := TCargoSearchFrame.Create(nil);
  CargoSearchFrame.Caption := 'Busca de Cargo';
  CargoSearchFrame.MainDataModule := CargoData;
  // Cadastro de cargo
  CargoRecordFrame := TCargoRecordFrame.Create(nil);
  CargoRecordFrame.Caption := 'Cadastro de Cargo';
  CargoRecordFrame.MainDataModule := CargoData;
  CargoRecordFrame.SearchFrame := CargoSearchFrame;
   // Cadastro de Centro de Custo
  CentroCustoRecordFrame := TCentroCustoRecordFrame.Create(nil);
  CentroCustoRecordFrame.Caption := 'Cadastro de Centro de Custo';
  CentroCustoRecordFrame.MainDataModule := CentroCustoData;
  // Busca de CFOP
  CfopSearchFrame := TCfopSearchFrame.Create(nil);
  CfopSearchFrame.Caption := 'Busca de CFOP';
  CfopSearchFrame.MainDataModule := CfopData;
  // Cadastro de CFOP
  CfopRecordFrame := TCfopRecordFrame.Create(nil);
  CfopRecordFrame.Caption := 'Cadastro de CFOP';
  CfopRecordFrame.MainDataModule := CfopData;
  CfopRecordFrame.SearchFrame := CfopSearchFrame;
  // Busca de CFOP mais utilizado
  CfopMaisUtilSearchFrame := TCfopMaisUtilSearchFrame.Create(nil);
  CfopMaisUtilSearchFrame.Caption := 'Busca de CFOP Mais Utilizado';
  CfopMaisUtilSearchFrame.MainDataModule := CfopMaisData;
  // Cadastro de CFOP mais utilizado
  CfopMaisUtilRecordFrame := TCfopMaisUtilRecordFrame.Create(nil);
  CfopMaisUtilRecordFrame.Caption := 'Cadastro de CFOP Mais Utilizado';
  CfopMaisUtilRecordFrame.MainDataModule := CfopMaisData;
  CfopMaisUtilRecordFrame.SearchFrame := CfopMaisUtilSearchFrame;
  // Busca de cidade
  CidadeSearchFrame := TCidadeSearchFrame.Create(nil);
  CidadeSearchFrame.Caption := 'Busca de Cidade';
  CidadeSearchFrame.MainDataModule := CidadeData;
  // Cadastro de cidade
  CidadeRecordFrame := TCidadeRecordFrame.Create(nil);
  CidadeRecordFrame.Caption := 'Cadastro de Cidade';
  CidadeRecordFrame.MainDataModule := CidadeData;
  CidadeRecordFrame.SearchFrame := CidadeSearchFrame;
  // Busca de CLIENTE
  ClienteSearchFrame := TClienteSearchFrame.Create(nil);
  ClienteSearchFrame.Caption := 'Busca de CLIENTE';
  ClienteSearchFrame.MainDataModule := ClienteData;
  // Cadastro de CLIENTE
  ClienteRecordFrame := TClienteRecordFrame.Create(nil);
  ClienteRecordFrame.Caption := 'Cadastro de CLIENTE';
  ClienteRecordFrame.MainDataModule := ClienteData;
  ClienteRecordFrame.SearchFrame := ClienteSearchFrame;
  // Busca de CONDIÇÃO DE PAGAMENTO
  CondicaoPagamentoSearchFrame := TCondicaoPagamentoSearchFrame.Create(nil);
  CondicaoPagamentoSearchFrame.Caption := 'Busca de CONDIÇÃO DE PAGAMENTO';
  CondicaoPagamentoSearchFrame.MainDataModule := CondicaoPagamentoData;
  // Cadastro de CONDIÇÃO DE PAGAMENTO
  CondicaoPagTransRecordFrame := TCondicaoPagTransRecordFrame.Create(nil);
  CondicaoPagTransRecordFrame.Caption := 'Cadastro de CONDIÇÃO DE PAGAMENTO';
  CondicaoPagTransRecordFrame.MainDataModule := CondicaoPagamentoData;
  CondicaoPagTransRecordFrame.SearchFrame := CondicaoPagamentoSearchFrame;
   // Cadastro de CONFIGURAÇÃO
  ConfiguracaoRecordFrame := TConfiguracaoRecordFrame.Create(nil);
  ConfiguracaoRecordFrame.Caption := 'Cadastro de CONFIGURAÇÃO';
  ConfiguracaoRecordFrame.MainDataModule := ConfiguracaoData;
  // Busca de CONTAS
  ContaSearchFrame := TContaSearchFrame.Create(nil);
  ContaSearchFrame.Caption := 'Busca de CONTAS';
  ContaSearchFrame.MainDataModule := ContaData;
  // Cadastro de CONTAS
  ContaRecordFrame := TContaRecordFrame.Create(nil);
  ContaRecordFrame.Caption := 'Cadastro de CONTAS';
  ContaRecordFrame.MainDataModule := ContaData;
   // CONTAS A RECEBER
  ContasReceberFrame := TContasReceberFrame.Create(nil);
  ContasReceberFrame.Caption := 'CONTAS A RECEBER';
  ContasReceberFrame.MainDataModule := GerencialData;
   // CONTAS A PAGAR
  ContasPagarFrame := TContasPagarFrame.Create(nil);
  ContasPagarFrame.Caption := 'CONTAS A PAGAR';
  ContasPagarFrame.MainDataModule := GerencialData;
   // Busca de Conta Movimentacao
  ContaMovimentacaoSearchFrame := TContaMovimentacaoSearchFrame.Create(nil);
  ContaMovimentacaoSearchFrame.Caption := 'Busca de MOVIMENTAÇÕES NA CONTA';
  ContaMovimentacaoSearchFrame.MainDataModule := ContaMovimentacaoData;
  // Cadastro de CLIENTE
  ContaMovimentacaoRecordFrame := TContaMovimentacaoRecordFrame.Create(nil);
  ContaMovimentacaoRecordFrame.Caption := 'Cadastro de Movimentações na Conta';
  ContaMovimentacaoRecordFrame.MainDataModule := ContaMovimentacaoData;
  ContaMovimentacaoRecordFrame.SearchFrame := ContaMovimentacaoSearchFrame;
  // Busca de DuplicataPagar
  DuplicataPagarSearchFrame := TDuplicataPagarSearchFrame.Create(nil);
  DuplicataPagarSearchFrame.Caption := 'Busca de DuplicataPagar';
  DuplicataPagarSearchFrame.MainDataModule := DuplicataData;
  // Busca de Recebimento de Duplicatas a Pagar
  DuplicataPagSearchFrame := TDuplicataPagSearchFrame.Create(nil);
  DuplicataPagSearchFrame.Caption := 'Busca de DuplicataPagar';
  DuplicataPagSearchFrame.MainDataModule := DuplicataPagData;
  // Cadastro de DuplicataPagar
  DuplicataPagarRecordFrame := TDuplicataPagarRecordFrame.Create(nil);
  DuplicataPagarRecordFrame.Caption := 'Cadastro de DuplicataPagar';
  DuplicataPagarRecordFrame.MainDataModule := DuplicataData;
  DuplicataPagarRecordFrame.SearchFrame := DuplicataPagarSearchFrame;
  // Cadastro de Baixa nas Duplicatas a Pagar
  PagDuplicataPagRecordFrame := TPagDuplicataPagRecordFrame.Create(nil);
  PagDuplicataPagRecordFrame.Caption := 'Baixa nas Duplicatas a Pagar';
  PagDuplicataPagRecordFrame.MainDataModule := DuplicataPagData;
  PagDuplicataPagRecordFrame.SearchFrame := DuplicataPagSearchFrame;
  // Busca de DuplicataReceber
  DuplicataRecSearchFrame := TDuplicataRecSearchFrame.Create(nil);
  DuplicataRecSearchFrame.Caption := 'Busca de Duplicatas a Receber';
  DuplicataRecSearchFrame.MainDataModule := DuplicataReceberData;
  // Cadastro de Baixa nas Duplicatas a Receber
  PagDuplicataRecRecordFrame := TPagDuplicataRecRecordFrame.Create(nil);
  PagDuplicataRecRecordFrame.Caption := 'Baixa nas Duplicatas a Receber';
  PagDuplicataRecRecordFrame.MainDataModule := DuplicataReceberData;
  PagDuplicataRecRecordFrame.SearchFrame := DuplicataRecSearchFrame;
  // Busca de Empresa
  EmpresaSearchFrame := TEmpresaSearchFrame.Create(nil);
  EmpresaSearchFrame.Caption := 'Busca de Empresa';
  EmpresaSearchFrame.MainDataModule := EmpresaData;
  // Cadastro de Empresa
  EmpresaRecordFrame := TEmpresaRecordFrame.Create(nil);
  EmpresaRecordFrame.Caption := 'Cadastro de Empresa';
  EmpresaRecordFrame.MainDataModule := EmpresaData;
  EmpresaRecordFrame.SearchFrame := EmpresaSearchFrame;
  // Busca de Entrada
  EntradaSearchFrame := TEntradaSearchFrame.Create(nil);
  EntradaSearchFrame.Caption := 'Busca de Entrada';
  EntradaSearchFrame.MainDataModule := EntradaData;
  // Cadastro de Entrada
  EntradaTransRecordFrame := TEntradaTransRecordFrame.Create(nil);
  EntradaTransRecordFrame.Caption := 'Cadastro de Entrada';
  EntradaTransRecordFrame.MainDataModule := EntradaData;
  EntradaTransRecordFrame.SearchFrame := EntradaSearchFrame;
  // Busca de FORNECEDOR
  FornecedorSearchFrame := TFornecedorSearchFrame.Create(nil);
  FornecedorSearchFrame.Caption := 'Busca de FORNECEDOR';
  FornecedorSearchFrame.MainDataModule := FornecedorData;
  // Cadastro de FORNECEDOR
  FornecedorRecordFrame := TFornecedorRecordFrame.Create(nil);
  FornecedorRecordFrame.Caption := 'Cadastro de FORNECEDOR';
  FornecedorRecordFrame.MainDataModule := FornecedorData;
  FornecedorRecordFrame.SearchFrame := FornecedorSearchFrame;
  // Busca de Funcionario
  FuncionarioSearchFrame := TFuncionarioSearchFrame.Create(nil);
  FuncionarioSearchFrame.Caption := 'Busca de Funcionario';
  FuncionarioSearchFrame.MainDataModule := FuncionarioData;
  // Cadastro de Funcionario
  FuncionarioRecordFrame := TFuncionarioRecordFrame.Create(nil);
  FuncionarioRecordFrame.Caption := 'Cadastro de Funcionario';
  FuncionarioRecordFrame.MainDataModule := FuncionarioData;
  FuncionarioRecordFrame.SearchFrame := FuncionarioSearchFrame;
  // Busca de GRUPO
  GrupoSearchFrame := TGrupoSearchFrame.Create(nil);
  GrupoSearchFrame.Caption := 'Busca de GRUPO';
  GrupoSearchFrame.MainDataModule := GrupoData;
  // Cadastro de GRUPO
  GrupoRecordFrame := TGrupoRecordFrame.Create(nil);
  GrupoRecordFrame.Caption := 'Cadastro de GRUPO';
  GrupoRecordFrame.MainDataModule := GrupoData;
  GrupoRecordFrame.SearchFrame := GrupoSearchFrame;
  // Cadastro de GARÇON
  GarconRecordFrame := TGarconRecordFrame.Create(nil);
  GarconRecordFrame.Caption := 'Cadastro de GARÇON';
  GarconRecordFrame.MainDataModule := GarconData;
   // Gerencial
  GerencialMainFrame := TGerencialMainFrame.Create(nil);
  GerencialMainFrame.Caption := 'GERENCIAL';
  GerencialMainFrame.MainDataModule := GerencialData;
  // Cadastro de Lançamento
  LancamentosFrame := TLancamentosFrame.Create(nil);
  LancamentosFrame.Caption := 'Lançamentos';
  LancamentosFrame.MainDataModule := GerencialData;
  // Busca de Marca
  MarcaSearchFrame := TMarcaSearchFrame.Create(nil);
  MarcaSearchFrame.Caption := 'Busca de Marca';
  MarcaSearchFrame.MainDataModule := MarcaData;
  // Cadastro de Marca
  MarcaRecordFrame := TMarcaRecordFrame.Create(nil);
  MarcaRecordFrame.Caption := 'Cadastro de Marca';
  MarcaRecordFrame.MainDataModule := MarcaData;
  MarcaRecordFrame.SearchFrame := MarcaSearchFrame;
   // Cadastro de MESA
  MesaRecordFrame := TMesaRecordFrame.Create(nil);
  MesaRecordFrame.Caption := 'Cadastro de Mesa';
  MesaRecordFrame.MainDataModule := MesaData;
  // Busca de PESSOA
  PessoaSearchFrame := TPessoaSearchFrame.Create(nil);
  PessoaSearchFrame.Caption := 'Busca de PESSOAS';
  PessoaSearchFrame.MainDataModule := PessoaData;
  // Cadastro de PESSOA
  PessoaRecorFrame := TPessoaRecorFrame.Create(nil);
  PessoaRecorFrame.Caption := 'Cadastro de PESSOA';
  PessoaRecorFrame.MainDataModule := PessoaData;
  PessoaRecorFrame.SearchFrame := PessoaSearchFrame;
  // Cadastro de PERFIL
  PerfilRecordFrame := TPerfilRecordFrame.Create(nil);
  PerfilRecordFrame.Caption := 'Cadastro de PERFIL';
  PerfilRecordFrame.MainDataModule := PerfilData;
  // Cadastro de PERFIL
  PerfilFunc2RecordFrame := TPerfilFunc2RecordFrame.Create(nil);
  PerfilFunc2RecordFrame.Caption := 'Cadastro de PERFIL';
  PerfilFunc2RecordFrame.MainDataModule := PerfilFunc2Data;
  // Busca de Produto
  ProdutoSearchFrame := TProdutoSearchFrame.Create(nil);
  ProdutoSearchFrame.Caption := 'Busca de Produto';
  ProdutoSearchFrame.MainDataModule := ProdutoData;
  // Cadastro de Produto
  ProdutoRecordFrame := TProdutoRecordFrame.Create(nil);
  ProdutoRecordFrame.Caption := 'Cadastro de Produto';
  ProdutoRecordFrame.MainDataModule := ProdutoData;
  ProdutoRecordFrame.SearchFrame := ProdutoSearchFrame;
   // Cadastro de Plano de Conta
  PlanoContaRecordFrame := TPlanoContaRecordFrame.Create(nil);
  PlanoContaRecordFrame.Caption := 'Cadastro de Plano de Contas';
  PlanoContaRecordFrame.MainDataModule := PlanoContaData;
  // Busca de RAMO
  RamoSearchFrame := TRamoSearchFrame.Create(nil);
  RamoSearchFrame.Caption := 'Busca de RAMO';
  RamoSearchFrame.MainDataModule := RamoData;
  // Cadastro de RAMO
  RamoRecordFrame := TRamoRecordFrame.Create(nil);
  RamoRecordFrame.Caption := 'Cadastro de RAMO';
  RamoRecordFrame.MainDataModule := RamoData;
  RamoRecordFrame.SearchFrame := RamoSearchFrame;
   // RECEITA E DESPESA
  ReceitaDespesaAnualFrame := TReceitaDespesaFrame.Create(nil);
  ReceitaDespesaAnualFrame.Caption := 'Receitas e Despesas';
  ReceitaDespesaAnualFrame.MainDataModule := GerencialData;
   // Busca de Saida dos Produtos para CONSUMO
  SaidaSearchFrame := TSaidaSearchFrame.Create(nil);
  SaidaSearchFrame.Caption := 'Busca de Saida dos Produtos Consumidos';
  SaidaSearchFrame.MainDataModule := saidaData;
  // Cadastro de Saida dos Produtos para Consumo
  SaidaRecordFrame := TSaidaRecordFrame.Create(nil);
  SaidaRecordFrame.Caption := 'Cadastro de Saidas dos Produtos para Consumo';
  SaidaRecordFrame.MainDataModule := SaidaData;
  SaidaRecordFrame.SearchFrame := SaidaSearchFrame;
   // Cadastro de Transferencia
  TransferenciaRecordFrame := TTransferenciaRecordFrame.Create(nil);
  TransferenciaRecordFrame.Caption := 'Cadastro de Transferência';
  TransferenciaRecordFrame.MainDataModule := ContaMovimentacaoData;
  // Busca de UNIDADE
  UnidadeSearchFrame := TUnidadeSearchFrame.Create(nil);
  UnidadeSearchFrame.Caption := 'Busca de UNIDADE';
  UnidadeSearchFrame.MainDataModule := UnidadeData;
  // Cadastro de UNIDADE
  UnidadeRecordFrame := TUnidadeRecordFrame.Create(nil);
  UnidadeRecordFrame.Caption := 'Cadastro de UNIDADE';
  UnidadeRecordFrame.MainDataModule := UnidadeData;
  UnidadeRecordFrame.SearchFrame := UnidadeSearchFrame;
  // Busca de Usuarios
  UsuarioSearchFrame := TUsuarioSearchFrame.Create(nil);
  UsuarioSearchFrame.Caption := 'Busca de Usuário';
  UsuarioSearchFrame.MainDataModule := UsuarioData;
  // Cadastro de Usuarios
  UsuarioRecordFrame := TUsuarioRecordFrame.Create(nil);
  UsuarioRecordFrame.Caption := 'Cadastro de USUÁRIOS';
  UsuarioRecordFrame.MainDataModule := UsuarioData;
  UsuarioRecordFrame.SearchFrame := UsuarioSearchFrame;
  // Alteração da Senha
  TrocaSenhaRecordFrame := TTrocaSenhaRecordFrame.Create(nil);
  TrocaSenhaRecordFrame.Caption := 'Alteração da Senha';
  TrocaSenhaRecordFrame.MainDataModule := TrocaSenhaData;

  // Busca de Vendas Abertas
  VendaAbertaSearchFrame := TVendaAbertaSearchFrame.Create(nil);
  VendaAbertaSearchFrame.Caption := 'Busca de VENDA ABERTA';
  VendaAbertaSearchFrame.MainDataModule := VendaAbertaData;
  // Cadastro de Venda
  VendaAbertaTransRecordFrame := TVendaAbertaTransRecordFrame.Create(nil);
  VendaAbertaTransRecordFrame.Caption := 'Cadastro de VENDA';
  VendaAbertaTransRecordFrame.MainDataModule := VendaAbertaData;
  VendaAbertaTransRecordFrame.SearchFrame := VendaAbertaSearchFrame;
  // Busca de Vendas Abertas
  VendaSearchFrame := TVendaSearchFrame.Create(nil);
  VendaSearchFrame.Caption := 'Busca de VENDA';
  VendaSearchFrame.MainDataModule := VendaFrData;
  // Ver as Vendas feitas
  VendaRecordFrame := TVendaRecordFrame.Create(nil);
  VendaRecordFrame.Caption := 'VENDAS REALIZADAS';
  VendaRecordFrame.MainDataModule := VendaFrData;
  VendaRecordFrame.SearchFrame := VendaSearchFrame;
end;

end.
